home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / workbook / mdi_pare.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1998-12-15  |  859 b   |  33 lines

  1. VERSION 5.00
  2. Begin VB.MDIForm MDI_Parent 
  3.    BackColor       =   &H8000000C&
  4.    Caption         =   "WorkBookOCX Sample"
  5.    ClientHeight    =   6600
  6.    ClientLeft      =   90
  7.    ClientTop       =   660
  8.    ClientWidth     =   8595
  9.    LinkTopic       =   "MDIForm1"
  10.    StartUpPosition =   2  'CenterScreen
  11.    Begin VB.Menu mnu_File 
  12.       Caption         =   "&File"
  13.       Begin VB.Menu mnu_new 
  14.          Caption         =   "&New WorkBook"
  15.          Shortcut        =   ^N
  16.       End
  17.    End
  18. Attribute VB_Name = "MDI_Parent"
  19. Attribute VB_GlobalNameSpace = False
  20. Attribute VB_Creatable = False
  21. Attribute VB_PredeclaredId = True
  22. Attribute VB_Exposed = False
  23. Option Explicit
  24. Private Sub MDIForm_Load()
  25. mnu_new_Click
  26. End Sub
  27. Private Sub mnu_new_Click()
  28. Dim fx As New Form1
  29. Set fx = New Form1
  30. Load fx
  31. fx.Show
  32. End Sub
  33.